%% 顺序结构程序

% 计算输入的x,y,x1,x2构成的（x,y)和(x1,y2)两个点的距离和黄金分割点（x<x2)

% 接收输入
x = input('x=');
y = input('y=');
x1 = input('x1=');
y1 = input('y1=');

dist = sqrt((x-x1)^2 + (y-y1)^2);

x2 = x + (x1 - x)*0.618;
y2 = y + (y1 - y)*0.618;

coord = [x2,y2];

% 程序暂停
% pause(5) % 暂停5秒钟
% Ctrl+C可以强制停止运行程序

disp('距离为:');
disp(dist);
disp('黄金分割点坐标为:');
disp(coord);